Let's Learn About Machines/Let's Learn About Machines.iso/mac/macfiles/Work/plane.Dxr/00006.ls

Text File | 1997-09-18 | 635 b | 26 lines

on exitFrame
  global tagCount, foundAll, tagOrder, locH1, foundE1, foundE2, foundE3, lightsOn, foundL1, foundL2, foundA1, foundA2, foundI1, foundI2, foundN1, foundN2, foundN3, floor, solved5
  set floor to 0
  set foundL1 to 0
  set foundL2 to 0
  set foundE1 to 0
  set foundE2 to 0
  set foundE3 to 0
  set foundA1 to 0
  set foundA2 to 0
  set foundI1 to 0
  set foundI2 to 0
  set foundN1 to 0
  set foundN2 to 0
  set foundN3 to 0
  set locH1 to -20
  set tagOrder to EMPTY
  set foundAll to 0
  set tagCount to 0
  if not solved5 then
    set solved5 to 1
    set lightsOn to lightsOn + 1
  end if
  go(1, "@::Rube:MMCong")
end